home *** CD-ROM | disk | FTP | other *** search
/ MacTech 1 to 12 / MacTech-vol-1-12.toast / Source / MacTech® Magazine / Volume 06 - 1990 / 06.02 Feb 90 / cdev Shell Code / cdev.r < prev    next >
Encoding:
Text File  |  1989-07-08  |  2.0 KB  |  84 lines  |  [TEXT/MPS ]
  1. #include "Types.r"
  2.  
  3. type 'samp' as 'STR ';
  4.  
  5. type 'nrct' {
  6.     integer = $$CountOf(RectArray);
  7.     array RectArray { rect; };
  8. };
  9.  
  10. type 'mach' {
  11.     unsigned hex integer;    /* Softmask */
  12.     unsigned hex integer;    /* Hardmask */
  13. };
  14.  
  15. resource 'samp' (0, purgeable) {
  16.     "Sample cdev 1.0d2, June 23, 1987"
  17. };
  18.  
  19. resource 'BNDL' (-4064, purgeable) {
  20.     'samp', 0,
  21.     {    'ICN#', {0, -4064},
  22.         'FREF', {0, -4064}
  23.     }
  24. };
  25.  
  26. resource 'ICN#' (-4064, purgeable) {
  27.     {
  28.         $"FFFF FFFF 8000 0001 8000 0001 8000 0001"
  29.         $"800E 0001 800E 0001 800E 0001 800E 0001"
  30.         $"800E 0000 76FE 3E33 F9FE 7F33 F9FE 6333"
  31.         $"E1CE 7F33 E1CE 7F33 E1CE 603F F9FE 7F1E"
  32.         $"F9FE 7F1E 78FE 3F0C 8000 0001 8000 0001"
  33.         $"8000 0001 8000 0001 8000 0001 8000 0001"
  34.         $"8000 0001 8000 0001 8000 0001 8000 0001"
  35.         $"FFFF FFFF 0000 0000 0000 0000 0000 0000",
  36.         
  37.         $"FFFF FFFF FFFF FFFF FFFF FFFF FFFF FFFF"
  38.         $"FFFF FFFF FFFF FFFF FFFF FFFF FFFF FFFF"
  39.         $"FFFF FFFF 7FFF FFFF FFFF FFFF FFFF FFFF"
  40.         $"FFFF FFFF FFFF FFFF FFFF FFFF FFFF FFFF"
  41.         $"FFFF FFFF 7FFF FFFF FFFF FFFF FFFF FFFF"
  42.         $"FFFF FFFF FFFF FFFF FFFF FFFF FFFF FFFF"
  43.         $"FFFF FFFF FFFF FFFF FFFF FFFF FFFF FFFF"
  44.         $"FFFF FFFF 0000 0000 0000 0000 0000 0000"
  45.     }
  46. };
  47.  
  48. resource 'FREF' (-4064, purgeable) {
  49.     'cdev', 0, ""
  50. };
  51.  
  52. resource 'mach' (-4064, purgeable) {
  53.     0xFFFF,
  54.     0
  55. };
  56.  
  57. resource 'nrct' (-4064, purgeable) {
  58. {
  59.     {-1, 87, 79, 322}
  60.     }
  61. };
  62.  
  63. resource 'DITL' (-4064, purgeable) {
  64.     {
  65.         {4, 287, 16, 320}, StaticText {disabled, "1.0d2"};
  66.         {4,  92, 16, 280}, StaticText {disabled, "Messages recieved by Sample: "};
  67.         {26, 122, 43, 170}, Control {enabled, -4048};
  68.         {42, 122, 59, 170}, Control {enabled, -4047};
  69.         {29, 190, 41, 230}, StaticText {disabled, "Handled:"};
  70.         {45, 190, 57, 230}, StaticText {disabled, "Ignored:"};
  71.         {29, 240, 39, 300}, UserItem {disabled};
  72.         {45, 240, 55, 300}, UserItem {disabled}
  73.     }
  74. };
  75.  
  76.  
  77. resource 'CNTL' (-4048, purgeable) {
  78.     {26, 122, 43, 170}, 0, visible, 1, 0, radioButProcUseWFont, 0, "Show"
  79. };
  80.  
  81. resource 'CNTL' (-4047, purgeable) {
  82.     {42, 122, 59, 170}, 0, visible, 1, 0, radioButProcUseWFont, 0, "Hide"
  83. };
  84.